home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Joystick Magazine 2000 November
/
cd joystick no120 novembre 2000 cd 1.iso
/
data
/
demos
/
gunlok
/
data1.cab
/
Program_Executable_Files
/
scripts
/
tankerhullfire.gsh
< prev
next >
Wrap
Text File
|
2000-08-22
|
1KB
|
56 lines
// defines TankerHullFire
////////////////////////////////////////////////////////////////////////////////////
// start wrapper - prevent multiple inclusions or recursive inclusions
//(this currently causes 'unrecognized preprocessor directive' warnings, until implemented)
#ifndef INCLUDED_TANKERHULLFIRE_GSH
#define INCLUDED_TANKERHULLFIRE_GSH
////////////////////////////////////////////////////////////////////////////////////
#include "defaults.gsh"
pgenerator Pgn_TankerHullFire
{
type fire
life infinite
rate 10
// stream direction
x 0
y -1
z 0
// particle colour
red 1
green 0.4
blue 0.1
alpha 1
start scale 1.0
end scale 0.3
spin 10000
}
light Lit_TankerHullFire
{
red 4
green 1.5
blue 0.2
specular red 1.5
specular green 0.5
specular blue 0
range 10
}
role Rol_TankerHullFire : Rol_PlacedObject
{
shape Pgn_TankerHullFire
light Lit_TankerHullFire
}
////////////////////////////////////////////////////////////////////////////////////
// end wrapper - for preventing multiple or recursive inclusions
#endif // !INCLUDED_CARFIRE_GSH